Player-Adultp names an undocumented function, with lambda list (&OPTIONAL (PLAYER *USER*)).
Defined in file src/users.lisp.